home *** CD-ROM | disk | FTP | other *** search
/ 1000 Apple LAN Literacy / 1000 Apple LAN Literacy.iso / Apple LAN Literacy / Literacy Segments Part 1 / Literacy Segments Part 1 / card_108162.txt < prev    next >
Text File  |  1989-08-22  |  2KB  |  107 lines
  1. -- card: 108162 from stack: in
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 108322
  5. -- name: “Network” Defined E/1
  6. ----- HyperTalk script -----
  7. on openCard
  8.   global btnStatus
  9.   get line 1 of btnStatus
  10.   -- the line number should be tailored for each menu
  11.   repeat with i = 1 to 3
  12.     -- tailor to number of menu items on given menu
  13.     if item i of it is not empty
  14.     then set the hilite of bg btn ("item" & i) to true
  15.   else set the hilite of bg btn ("item" & i) to false
  16. end repeat
  17. pass openCard
  18. end openCard
  19.  
  20.  
  21. -- part 1 (button)
  22. -- low flags: 00
  23. -- high flags: 0000
  24. -- rect: left=482 top=294 right=320 bottom=509
  25. -- title width / last selected line: 0
  26. -- icon id / first selected line: 1235 / 1235
  27. -- text alignment: 1
  28. -- font id: 0
  29. -- text size: 12
  30. -- style flags: 0
  31. -- line height: 16
  32. -- part name: Last Menu
  33. ----- HyperTalk script -----
  34. on mouseUp
  35.  
  36. end mouseUp
  37.  
  38.  
  39.  
  40. -- part 2 (button)
  41. -- low flags: 00
  42. -- high flags: 0000
  43. -- rect: left=493 top=319 right=341 bottom=512
  44. -- title width / last selected line: 0
  45. -- icon id / first selected line: 1400 / 1400
  46. -- text alignment: 1
  47. -- font id: 0
  48. -- text size: 12
  49. -- style flags: 0
  50. -- line height: 16
  51. -- part name: Next
  52. ----- HyperTalk script -----
  53. on mouseUp
  54.  
  55. end mouseUp
  56.  
  57.  
  58.  
  59. -- part 3 (button)
  60. -- low flags: 00
  61. -- high flags: 0000
  62. -- rect: left=478 top=319 right=341 bottom=498
  63. -- title width / last selected line: 0
  64. -- icon id / first selected line: 1401 / 1401
  65. -- text alignment: 1
  66. -- font id: 0
  67. -- text size: 12
  68. -- style flags: 0
  69. -- line height: 16
  70. -- part name: Prev
  71. ----- HyperTalk script -----
  72. on mouseUp
  73.  
  74. end mouseUp
  75.  
  76.  
  77.  
  78. -- part contents for background part 21
  79. ----- text -----
  80. 108162
  81.  
  82. -- part contents for background part 11
  83. ----- text -----
  84. Examples
  85.  
  86. -- part contents for background part 24
  87. ----- text -----
  88. Click a choice.
  89.  
  90. -- part contents for background part 25
  91. ----- text -----
  92. Example 1:
  93. A Familiar, Simple Link
  94.  
  95. -- part contents for background part 28
  96. ----- text -----
  97. Example 2:
  98. A Simple Network
  99.  
  100. -- part contents for background part 34
  101. ----- text -----
  102. Example 3:
  103. A Worldwide Network
  104.  
  105. -- part contents for background part 3
  106. ----- text -----
  107. ‚ÄúNetwork‚Äù Defined